home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 4 (Reseller) / Apple Ref. & Pres. Lib.v4.0.iso / 4-Demos / Third Party Demos / Information Management / MicroPlanner / card_10309.txt < prev    next >
Text File  |  1990-03-22  |  27KB  |  1,323 lines

  1. -- card: 10309 from stack: in
  2. -- bmap block id: 22570
  3. -- flags: 0000
  4. -- background id: 2600
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 80
  10. -- high flags: 0007
  11. -- rect: left=46 top=65 right=170 bottom=213
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 0
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: 
  20.  
  21.  
  22. -- part 2 (field)
  23. -- low flags: 80
  24. -- high flags: 0007
  25. -- rect: left=46 top=65 right=170 bottom=213
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 0
  29. -- font id: 0
  30. -- text size: 12
  31. -- style flags: 0
  32. -- line height: 16
  33. -- part name: 
  34.  
  35.  
  36. -- part 3 (field)
  37. -- low flags: 80
  38. -- high flags: 0007
  39. -- rect: left=46 top=65 right=170 bottom=213
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 0
  43. -- font id: 0
  44. -- text size: 12
  45. -- style flags: 0
  46. -- line height: 16
  47. -- part name: 
  48.  
  49.  
  50. -- part 4 (field)
  51. -- low flags: 80
  52. -- high flags: 0007
  53. -- rect: left=46 top=65 right=170 bottom=213
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 0
  57. -- font id: 0
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: 
  62.  
  63.  
  64. -- part 5 (field)
  65. -- low flags: 80
  66. -- high flags: 0007
  67. -- rect: left=46 top=65 right=170 bottom=213
  68. -- title width / last selected line: 0
  69. -- icon id / first selected line: 0 / 0
  70. -- text alignment: 0
  71. -- font id: 0
  72. -- text size: 12
  73. -- style flags: 0
  74. -- line height: 16
  75. -- part name: 
  76.  
  77.  
  78. -- part 6 (field)
  79. -- low flags: 80
  80. -- high flags: 0007
  81. -- rect: left=46 top=65 right=170 bottom=213
  82. -- title width / last selected line: 0
  83. -- icon id / first selected line: 0 / 0
  84. -- text alignment: 0
  85. -- font id: 0
  86. -- text size: 12
  87. -- style flags: 0
  88. -- line height: 16
  89. -- part name: 
  90.  
  91.  
  92. -- part 7 (field)
  93. -- low flags: 80
  94. -- high flags: 0007
  95. -- rect: left=46 top=65 right=170 bottom=213
  96. -- title width / last selected line: 0
  97. -- icon id / first selected line: 0 / 0
  98. -- text alignment: 0
  99. -- font id: 0
  100. -- text size: 12
  101. -- style flags: 0
  102. -- line height: 16
  103. -- part name: 
  104.  
  105.  
  106. -- part 8 (field)
  107. -- low flags: 80
  108. -- high flags: 0007
  109. -- rect: left=46 top=65 right=170 bottom=213
  110. -- title width / last selected line: 0
  111. -- icon id / first selected line: 0 / 0
  112. -- text alignment: 0
  113. -- font id: 0
  114. -- text size: 12
  115. -- style flags: 0
  116. -- line height: 16
  117. -- part name: 
  118.  
  119.  
  120. -- part 9 (field)
  121. -- low flags: 80
  122. -- high flags: 0007
  123. -- rect: left=46 top=65 right=170 bottom=213
  124. -- title width / last selected line: 0
  125. -- icon id / first selected line: 0 / 0
  126. -- text alignment: 0
  127. -- font id: 0
  128. -- text size: 12
  129. -- style flags: 0
  130. -- line height: 16
  131. -- part name: 
  132.  
  133.  
  134. -- part 10 (field)
  135. -- low flags: 80
  136. -- high flags: 0007
  137. -- rect: left=46 top=65 right=170 bottom=213
  138. -- title width / last selected line: 0
  139. -- icon id / first selected line: 0 / 0
  140. -- text alignment: 0
  141. -- font id: 0
  142. -- text size: 12
  143. -- style flags: 0
  144. -- line height: 16
  145. -- part name: 
  146.  
  147.  
  148. -- part 11 (field)
  149. -- low flags: 80
  150. -- high flags: 0007
  151. -- rect: left=46 top=65 right=170 bottom=213
  152. -- title width / last selected line: 0
  153. -- icon id / first selected line: 0 / 0
  154. -- text alignment: 0
  155. -- font id: 0
  156. -- text size: 12
  157. -- style flags: 0
  158. -- line height: 16
  159. -- part name: 
  160.  
  161.  
  162. -- part 12 (field)
  163. -- low flags: 80
  164. -- high flags: 0007
  165. -- rect: left=46 top=65 right=170 bottom=213
  166. -- title width / last selected line: 0
  167. -- icon id / first selected line: 0 / 0
  168. -- text alignment: 0
  169. -- font id: 0
  170. -- text size: 12
  171. -- style flags: 0
  172. -- line height: 16
  173. -- part name: 
  174.  
  175.  
  176. -- part 13 (field)
  177. -- low flags: 81
  178. -- high flags: 0000
  179. -- rect: left=46 top=65 right=170 bottom=213
  180. -- title width / last selected line: 0
  181. -- icon id / first selected line: 0 / 0
  182. -- text alignment: 1
  183. -- font id: 21
  184. -- text size: 24
  185. -- style flags: 2048
  186. -- line height: 26
  187. -- part name: Prompt
  188.  
  189.  
  190. -- part 14 (button)
  191. -- low flags: 00
  192. -- high flags: 8003
  193. -- rect: left=250 top=34 right=56 bottom=384
  194. -- title width / last selected line: 0
  195. -- icon id / first selected line: 0 / 0
  196. -- text alignment: 1
  197. -- font id: 0
  198. -- text size: 12
  199. -- style flags: 0
  200. -- line height: 16
  201. -- part name: Defense/Aerospace
  202. ----- HyperTalk script -----
  203. on mouseDown
  204.   set the visible of card field 13 to false
  205.   set the visible of card field 1 to true
  206.   set the scroll of card field 1 to 0
  207.   Wait for 1 seconds
  208.   Put 1 into Count
  209.   repeat while the mouse is down
  210.     set the scroll of card field 1 to Count
  211.     Put Count + 8 into Count
  212.   end repeat
  213.   set the visible of card field 1 to false
  214.   set the visible of card field 13 to true
  215.   set the scroll of card field 1 to 0
  216. end mouseDown
  217.  
  218.  
  219.  
  220. -- part 15 (button)
  221. -- low flags: 00
  222. -- high flags: 8003
  223. -- rect: left=252 top=62 right=82 bottom=382
  224. -- title width / last selected line: 0
  225. -- icon id / first selected line: 0 / 0
  226. -- text alignment: 1
  227. -- font id: 0
  228. -- text size: 12
  229. -- style flags: 0
  230. -- line height: 16
  231. -- part name: Computer
  232. ----- HyperTalk script -----
  233. on mouseDown
  234.   set the visible of card field 13 to false
  235.   set the visible of card field 2 to true
  236.   set the scroll of card field 2 to 0
  237.   Wait for 1 seconds
  238.   Put 1 into Count
  239.   repeat while the mouse is down
  240.     set the scroll of card field 2 to Count
  241.     Put Count + 8 into Count
  242.   end repeat
  243.   set the visible of card field 2 to false
  244.   set the visible of card field 13 to true
  245.   set the scroll of card field 2 to 0
  246. end mouseDown
  247.  
  248.  
  249.  
  250. -- part 16 (button)
  251. -- low flags: 00
  252. -- high flags: 8003
  253. -- rect: left=253 top=89 right=112 bottom=382
  254. -- title width / last selected line: 0
  255. -- icon id / first selected line: 0 / 0
  256. -- text alignment: 1
  257. -- font id: 0
  258. -- text size: 12
  259. -- style flags: 0
  260. -- line height: 16
  261. -- part name: Communication
  262. ----- HyperTalk script -----
  263. on mouseDown
  264.   set the visible of card field 13 to false
  265.   set the visible of card field 3 to true
  266.   set the scroll of card field 3 to 0
  267.   Wait for 1 seconds
  268.   Put 1 into Count
  269.   repeat while the mouse is down
  270.     set the scroll of card field 3 to Count
  271.     Put Count + 8 into Count
  272.   end repeat
  273.   set the visible of card field 3 to false
  274.   set the visible of card field 13 to true
  275.   set the scroll of card field 3 to 0
  276. end mouseDown
  277.  
  278.  
  279.  
  280. -- part 17 (button)
  281. -- low flags: 00
  282. -- high flags: 8003
  283. -- rect: left=255 top=120 right=142 bottom=382
  284. -- title width / last selected line: 0
  285. -- icon id / first selected line: 0 / 0
  286. -- text alignment: 1
  287. -- font id: 0
  288. -- text size: 12
  289. -- style flags: 0
  290. -- line height: 16
  291. -- part name: Construction
  292. ----- HyperTalk script -----
  293. on mouseDown
  294.   set the visible of card field 13 to false
  295.   set the visible of card field 4 to true
  296.   set the scroll of card field 4 to 0
  297.   Wait for 1 seconds
  298.   Put 1 into Count
  299.   repeat while the mouse is down
  300.     set the scroll of card field 4 to Count
  301.     Put Count + 8 into Count
  302.   end repeat
  303.   set the visible of card field 4 to false
  304.   set the visible of card field 13 to true
  305.   set the scroll of card field 4 to 0
  306. end mouseDown
  307.  
  308.  
  309.  
  310. -- part 18 (button)
  311. -- low flags: 00
  312. -- high flags: 8003
  313. -- rect: left=254 top=151 right=173 bottom=380
  314. -- title width / last selected line: 0
  315. -- icon id / first selected line: 0 / 0
  316. -- text alignment: 1
  317. -- font id: 0
  318. -- text size: 12
  319. -- style flags: 0
  320. -- line height: 16
  321. -- part name: Education
  322. ----- HyperTalk script -----
  323. on mouseDown
  324.   set the visible of card field 13 to false
  325.   set the visible of card field 5 to true
  326.   set the scroll of card field 5 to 0
  327.   Wait for 1 seconds
  328.   Put 1 into Count
  329.   repeat while the mouse is down
  330.     set the scroll of card field 5 to Count
  331.     Put Count + 8 into Count
  332.   end repeat
  333.   set the visible of card field 5 to false
  334.   set the visible of card field 13 to true
  335.   set the scroll of card field 5 to 0
  336. end mouseDown
  337.  
  338.  
  339.  
  340. -- part 19 (button)
  341. -- low flags: 00
  342. -- high flags: 8003
  343. -- rect: left=254 top=211 right=232 bottom=382
  344. -- title width / last selected line: 0
  345. -- icon id / first selected line: 0 / 0
  346. -- text alignment: 1
  347. -- font id: 0
  348. -- text size: 12
  349. -- style flags: 0
  350. -- line height: 16
  351. -- part name: Energy
  352. ----- HyperTalk script -----
  353. on mouseDown
  354.   set the visible of card field 13 to false
  355.   set the visible of card field 6 to true
  356.   set the scroll of card field 6 to 0
  357.   Wait for 1 seconds
  358.   Put 1 into Count
  359.   repeat while the mouse is down
  360.     set the scroll of card field 6 to Count
  361.     Put Count + 8 into Count
  362.   end repeat
  363.   set the visible of card field 6 to false
  364.   set the visible of card field 13 to true
  365.   set the scroll of card field 6 to 0
  366. end mouseDown
  367.  
  368.  
  369.  
  370. -- part 20 (button)
  371. -- low flags: 00
  372. -- high flags: 8003
  373. -- rect: left=253 top=239 right=262 bottom=382
  374. -- title width / last selected line: 0
  375. -- icon id / first selected line: 0 / 0
  376. -- text alignment: 1
  377. -- font id: 0
  378. -- text size: 12
  379. -- style flags: 0
  380. -- line height: 16
  381. -- part name: Film/Production
  382. ----- HyperTalk script -----
  383. on mouseDown
  384.   set the visible of card field 13 to false
  385.   set the visible of card field 7 to true
  386.   set the scroll of card field 7 to 0
  387.   Wait for 1 seconds
  388.   Put 1 into Count
  389.   repeat while the mouse is down
  390.     set the scroll of card field 7 to Count
  391.     Put Count + 8 into Count
  392.   end repeat
  393.   set the visible of card field 7 to false
  394.   set the visible of card field 13 to true
  395.   set the scroll of card field 7 to 0
  396. end mouseDown
  397.  
  398.  
  399.  
  400. -- part 21 (button)
  401. -- low flags: 00
  402. -- high flags: 8003
  403. -- rect: left=255 top=271 right=292 bottom=382
  404. -- title width / last selected line: 0
  405. -- icon id / first selected line: 0 / 0
  406. -- text alignment: 1
  407. -- font id: 0
  408. -- text size: 12
  409. -- style flags: 0
  410. -- line height: 16
  411. -- part name: Consulting
  412. ----- HyperTalk script -----
  413. on mouseDown
  414.   set the visible of card field 13 to false
  415.   set the visible of card field 8 to true
  416.   set the scroll of card field 8 to 0
  417.   Wait for 1 seconds
  418.   Put 1 into Count
  419.   repeat while the mouse is down
  420.     set the scroll of card field 8 to Count
  421.     Put Count + 8 into Count
  422.   end repeat
  423.   set the visible of card field 8 to false
  424.   set the visible of card field 13 to true
  425.   set the scroll of card field 8 to 0
  426. end mouseDown
  427.  
  428.  
  429.  
  430. -- part 22 (button)
  431. -- low flags: 00
  432. -- high flags: 8003
  433. -- rect: left=254 top=301 right=322 bottom=382
  434. -- title width / last selected line: 0
  435. -- icon id / first selected line: 0 / 0
  436. -- text alignment: 1
  437. -- font id: 0
  438. -- text size: 12
  439. -- style flags: 0
  440. -- line height: 16
  441. -- part name: Government
  442. ----- HyperTalk script -----
  443. on mouseDown
  444.   set the visible of card field 13 to false
  445.   set the visible of card field 9 to true
  446.   set the scroll of card field 9 to 0
  447.   Wait for 1 seconds
  448.   Put 1 into Count
  449.   repeat while the mouse is down
  450.     set the scroll of card field 9 to Count
  451.     Put Count + 8 into Count
  452.   end repeat
  453.   set the visible of card field 9 to false
  454.   set the visible of card field 13 to true
  455.   set the scroll of card field 9 to 0
  456. end mouseDown
  457.  
  458.  
  459.  
  460. -- part 23 (button)
  461. -- low flags: 00
  462. -- high flags: 8003
  463. -- rect: left=388 top=34 right=56 bottom=510
  464. -- title width / last selected line: 0
  465. -- icon id / first selected line: 0 / 0
  466. -- text alignment: 1
  467. -- font id: 0
  468. -- text size: 12
  469. -- style flags: 0
  470. -- line height: 16
  471. -- part name: Industry
  472. ----- HyperTalk script -----
  473. on mouseDown
  474.   set the visible of card field 13 to false
  475.   set the visible of card field 10 to true
  476.   set the scroll of card field 10 to 0
  477.   Wait for 1 seconds
  478.   Put 1 into Count
  479.   repeat while the mouse is down
  480.     set the scroll of card field 10 to Count
  481.     Put Count + 8 into Count
  482.   end repeat
  483.   set the visible of card field 10 to false
  484.   set the visible of card field 13 to true
  485.   set the scroll of card field 10 to 0
  486. end mouseDown
  487.  
  488.  
  489.  
  490. -- part 25 (button)
  491. -- low flags: 00
  492. -- high flags: 8003
  493. -- rect: left=386 top=90 right=112 bottom=511
  494. -- title width / last selected line: 0
  495. -- icon id / first selected line: 0 / 0
  496. -- text alignment: 1
  497. -- font id: 0
  498. -- text size: 12
  499. -- style flags: 0
  500. -- line height: 16
  501. -- part name: Transport
  502. ----- HyperTalk script -----
  503. on mouseDown
  504.   set the visible of card field 13 to false
  505.   set the visible of card field 12 to true
  506.   set the scroll of card field 12 to 0
  507.   Wait for 1 seconds
  508.   Put 1 into Count
  509.   repeat while the mouse is down
  510.     set the scroll of card field 12 to Count
  511.     Put Count + 8 into Count
  512.   end repeat
  513.   set the visible of card field 12 to false
  514.   set the visible of card field 13 to true
  515.   set the scroll of card field 12 to 0
  516. end mouseDown
  517.  
  518.  
  519.  
  520. -- part 26 (field)
  521. -- low flags: 80
  522. -- high flags: 0007
  523. -- rect: left=46 top=65 right=170 bottom=213
  524. -- title width / last selected line: 0
  525. -- icon id / first selected line: 0 / 0
  526. -- text alignment: 0
  527. -- font id: 0
  528. -- text size: 12
  529. -- style flags: 0
  530. -- line height: 16
  531. -- part name: 
  532.  
  533.  
  534. -- part 27 (field)
  535. -- low flags: 80
  536. -- high flags: 0007
  537. -- rect: left=46 top=65 right=170 bottom=213
  538. -- title width / last selected line: 0
  539. -- icon id / first selected line: 0 / 0
  540. -- text alignment: 0
  541. -- font id: 0
  542. -- text size: 12
  543. -- style flags: 0
  544. -- line height: 16
  545. -- part name: 
  546.  
  547.  
  548. -- part 29 (field)
  549. -- low flags: 80
  550. -- high flags: 0007
  551. -- rect: left=46 top=65 right=170 bottom=213
  552. -- title width / last selected line: 0
  553. -- icon id / first selected line: 0 / 0
  554. -- text alignment: 0
  555. -- font id: 0
  556. -- text size: 12
  557. -- style flags: 0
  558. -- line height: 16
  559. -- part name: 
  560.  
  561.  
  562. -- part 30 (field)
  563. -- low flags: 80
  564. -- high flags: 0007
  565. -- rect: left=46 top=65 right=170 bottom=213
  566. -- title width / last selected line: 0
  567. -- icon id / first selected line: 0 / 0
  568. -- text alignment: 0
  569. -- font id: 0
  570. -- text size: 12
  571. -- style flags: 0
  572. -- line height: 16
  573. -- part name: 
  574.  
  575.  
  576. -- part 31 (field)
  577. -- low flags: 80
  578. -- high flags: 0007
  579. -- rect: left=46 top=65 right=170 bottom=213
  580. -- title width / last selected line: 0
  581. -- icon id / first selected line: 0 / 0
  582. -- text alignment: 0
  583. -- font id: 0
  584. -- text size: 12
  585. -- style flags: 0
  586. -- line height: 16
  587. -- part name: 
  588.  
  589.  
  590. -- part 32 (button)
  591. -- low flags: 00
  592. -- high flags: 8003
  593. -- rect: left=254 top=180 right=201 bottom=381
  594. -- title width / last selected line: 0
  595. -- icon id / first selected line: 0 / 0
  596. -- text alignment: 1
  597. -- font id: 0
  598. -- text size: 12
  599. -- style flags: 0
  600. -- line height: 16
  601. -- part name: Electronics
  602. ----- HyperTalk script -----
  603. on mouseDown
  604.   set the visible of card field 13 to false
  605.   set the visible of card field 14 to true
  606.   set the scroll of card field 14 to 0
  607.   Wait for 1 seconds
  608.   Put 1 into Count
  609.   repeat while the mouse is down
  610.     set the scroll of card field 14 to Count
  611.     Put Count + 8 into Count
  612.   end repeat
  613.   set the visible of card field 14 to false
  614.   set the visible of card field 13 to true
  615.   set the scroll of card field 14 to 0
  616. end mouseDown
  617.  
  618.  
  619.  
  620. -- part 33 (button)
  621. -- low flags: 00
  622. -- high flags: 8003
  623. -- rect: left=387 top=62 right=82 bottom=511
  624. -- title width / last selected line: 0
  625. -- icon id / first selected line: 0 / 0
  626. -- text alignment: 1
  627. -- font id: 0
  628. -- text size: 12
  629. -- style flags: 0
  630. -- line height: 16
  631. -- part name: Engin./Research
  632. ----- HyperTalk script -----
  633. on mouseDown
  634.   set the visible of card field 13 to false
  635.   set the visible of card field 15 to true
  636.   set the scroll of card field 15 to 0
  637.   Wait for 1 seconds
  638.   Put 1 into Count
  639.   repeat while the mouse is down
  640.     set the scroll of card field 15 to Count
  641.     Put Count + 8 into Count
  642.   end repeat
  643.   set the visible of card field 15 to false
  644.   set the visible of card field 13 to true
  645.   set the scroll of card field 15 to 0
  646. end mouseDown
  647.  
  648.  
  649.  
  650. -- part 34 (button)
  651. -- low flags: 00
  652. -- high flags: 8003
  653. -- rect: left=388 top=152 right=173 bottom=512
  654. -- title width / last selected line: 0
  655. -- icon id / first selected line: 0 / 0
  656. -- text alignment: 1
  657. -- font id: 0
  658. -- text size: 12
  659. -- style flags: 0
  660. -- line height: 16
  661. -- part name: Drug/Chemical
  662. ----- HyperTalk script -----
  663. on mouseDown
  664.   set the visible of card field 13 to false
  665.   set the visible of card field 21 to true
  666.   set the scroll of card field 21 to 0
  667.   Wait for 1 seconds
  668.   Put 1 into Count
  669.   repeat while the mouse is down
  670.     set the scroll of card field 21 to Count
  671.     Put Count + 8 into Count
  672.   end repeat
  673.   set the visible of card field 21 to false
  674.   set the visible of card field 13 to true
  675.   set the scroll of card field 21 to 0
  676. end mouseDown
  677.  
  678.  
  679.  
  680. -- part 35 (button)
  681. -- low flags: 00
  682. -- high flags: 8003
  683. -- rect: left=389 top=271 right=292 bottom=511
  684. -- title width / last selected line: 0
  685. -- icon id / first selected line: 0 / 0
  686. -- text alignment: 1
  687. -- font id: 0
  688. -- text size: 12
  689. -- style flags: 0
  690. -- line height: 16
  691. -- part name: That's enough!
  692. ----- HyperTalk script -----
  693. on mouseUp
  694.   set the visible of card field 13 to false
  695.   set the visible of card field 19 to true
  696.   wait for 2 seconds
  697.   set the visible of card field 19 to false
  698.   visual effect zoom close
  699.   pop card
  700. end mouseUp
  701.  
  702.  
  703.  
  704. -- part 36 (field)
  705. -- low flags: 80
  706. -- high flags: 0000
  707. -- rect: left=51 top=67 right=173 bottom=217
  708. -- title width / last selected line: 0
  709. -- icon id / first selected line: 0 / 0
  710. -- text alignment: 1
  711. -- font id: 21
  712. -- text size: 24
  713. -- style flags: 2304
  714. -- line height: 26
  715. -- part name: 
  716.  
  717.  
  718. -- part 37 (field)
  719. -- low flags: 80
  720. -- high flags: 0007
  721. -- rect: left=39 top=56 right=179 bottom=219
  722. -- title width / last selected line: 0
  723. -- icon id / first selected line: 0 / 0
  724. -- text alignment: 0
  725. -- font id: 0
  726. -- text size: 12
  727. -- style flags: 0
  728. -- line height: 16
  729. -- part name: 
  730.  
  731.  
  732. -- part 38 (button)
  733. -- low flags: 00
  734. -- high flags: 8003
  735. -- rect: left=385 top=122 right=143 bottom=512
  736. -- title width / last selected line: 0
  737. -- icon id / first selected line: 0 / 0
  738. -- text alignment: 1
  739. -- font id: 0
  740. -- text size: 12
  741. -- style flags: 0
  742. -- line height: 16
  743. -- part name: Finance/Insurance
  744. ----- HyperTalk script -----
  745. on mouseDown
  746.   set the visible of card field 13 to false
  747.   set the visible of card field 20 to true
  748.   set the scroll of card field 20 to 0
  749.   Wait for 1 seconds
  750.   Put 1 into Count
  751.   repeat while the mouse is down
  752.     set the scroll of card field 20 to Count
  753.     Put Count + 21 into Count
  754.   end repeat
  755.   set the visible of card field 20 to false
  756.   set the visible of card field 13 to true
  757.   set the scroll of card field 20 to 0
  758. end mouseDown
  759.  
  760.  
  761.  
  762. -- part 40 (button)
  763. -- low flags: 00
  764. -- high flags: 8003
  765. -- rect: left=388 top=209 right=230 bottom=512
  766. -- title width / last selected line: 0
  767. -- icon id / first selected line: 0 / 0
  768. -- text alignment: 1
  769. -- font id: 0
  770. -- text size: 12
  771. -- style flags: 0
  772. -- line height: 16
  773. -- part name: Goodwill/Health
  774. ----- HyperTalk script -----
  775. on mouseDown
  776.   set the visible of card field 13 to false
  777.   set the visible of card field 23 to true
  778.   set the scroll of card field 23 to 0
  779.   Wait for 1 seconds
  780.   Put 1 into Count
  781.   repeat while the mouse is down
  782.     set the scroll of card field 23 to Count
  783.     Put Count + 8 into Count
  784.   end repeat
  785.   set the visible of card field 23 to false
  786.   set the visible of card field 13 to true
  787.   set the scroll of card field 23 to 0
  788. end mouseDown
  789.  
  790.  
  791.  
  792. -- part 41 (button)
  793. -- low flags: 00
  794. -- high flags: 8003
  795. -- rect: left=388 top=179 right=200 bottom=512
  796. -- title width / last selected line: 0
  797. -- icon id / first selected line: 0 / 0
  798. -- text alignment: 1
  799. -- font id: 0
  800. -- text size: 12
  801. -- style flags: 0
  802. -- line height: 16
  803. -- part name: Consumer Goods
  804. ----- HyperTalk script -----
  805. on mouseDown
  806.   set the visible of card field 13 to false
  807.   set the visible of card field 22 to true
  808.   set the scroll of card field 22 to 0
  809.   Wait for 1 seconds
  810.   Put 1 into Count
  811.   repeat while the mouse is down
  812.     set the scroll of card field 22 to Count
  813.     Put Count + 8 into Count
  814.   end repeat
  815.   set the visible of card field 22 to false
  816.   set the visible of card field 13 to true
  817.   set the scroll of card field 22 to 0
  818. end mouseDown
  819.  
  820.  
  821.  
  822. -- part 42 (field)
  823. -- low flags: 80
  824. -- high flags: 0007
  825. -- rect: left=46 top=65 right=170 bottom=213
  826. -- title width / last selected line: 0
  827. -- icon id / first selected line: 0 / 0
  828. -- text alignment: 0
  829. -- font id: 0
  830. -- text size: 12
  831. -- style flags: 0
  832. -- line height: 16
  833. -- part name: 
  834.  
  835.  
  836. -- part 43 (field)
  837. -- low flags: 80
  838. -- high flags: 0007
  839. -- rect: left=46 top=65 right=170 bottom=213
  840. -- title width / last selected line: 0
  841. -- icon id / first selected line: 0 / 0
  842. -- text alignment: 0
  843. -- font id: 0
  844. -- text size: 12
  845. -- style flags: 0
  846. -- line height: 16
  847. -- part name: 
  848.  
  849.  
  850. -- part 44 (field)
  851. -- low flags: 80
  852. -- high flags: 0007
  853. -- rect: left=46 top=65 right=170 bottom=213
  854. -- title width / last selected line: 0
  855. -- icon id / first selected line: 0 / 0
  856. -- text alignment: 0
  857. -- font id: 0
  858. -- text size: 12
  859. -- style flags: 0
  860. -- line height: 16
  861. -- part name: 
  862.  
  863.  
  864. -- part contents for card part 13
  865. ----- text -----
  866. Press & hold one of the buttons on the right >
  867.  
  868. -- part contents for card part 1
  869. ----- text -----
  870. Aerojet
  871. Argonne Nat'l Lab
  872. AESA Robotics Inc.
  873. Bendix Aerospace
  874. Boeing
  875. British Aerospace
  876. CACU, Inc.
  877. E-Systems
  878. Ford Aerospace
  879. GE Astro Space
  880. Goodyear Aerospace
  881. Grumman Aerospace
  882. General Dynamics
  883. Hughes Aircraft
  884. Institute for Defense
  885.    Analysis
  886. Jet Propulsion Lab
  887. Kennedy Space Ctr.
  888. Lawrence Livermore
  889. Lear Siegler, Inc.   
  890. Lockheed
  891. Loral Defense System
  892. Los Alamos Labs
  893. Martin Marietta
  894. McDonnell Douglas
  895. Morton Thikol
  896. N.A.S.A.
  897. Naval Weapons Ctr.
  898. Northrop Aviation
  899. The Pentagon
  900. Pratt & Whitney
  901. Rockwell Intl.
  902. Rockwell Shuttle Opr.
  903. Raychem
  904. Raytheon
  905. Singer/Link
  906. Space Applications
  907. TRW
  908. United Technologies
  909.  
  910.  
  911. -- part contents for card part 2
  912. ----- text -----
  913. Advanced Micro
  914. Aldus-Pagemaker
  915. Amdahl
  916. Apollo
  917. Apple Computer Inc.
  918. Ashton-Tate
  919. AST Research, Inc.
  920. Boeing Computer 
  921. Broderbund
  922. Codex
  923. 3COM
  924. Computer Corp. of 
  925.   America
  926. Control Data
  927. Cray Research
  928. Digital Equipment
  929. Dynamac
  930. EDS
  931. Electronic Arts
  932. Fujitsu
  933. Harris Semiconductor
  934. Hewlett Packard
  935. Honeywell, Inc.
  936. IBM
  937. Intel
  938. Lotus Development
  939. Microsoft
  940. NEC
  941. Nicolet Instrument
  942. Prime Computer
  943. Seagate Technology
  944. Sperry
  945. Stratus Computers
  946. Sun Microsystems
  947. Tandem Computers
  948. TOPS
  949. Varian
  950. Unisys
  951. Wang Laboratories
  952.  
  953.  
  954.  
  955.  
  956. -- part contents for card part 3
  957. ----- text -----
  958. AT&T Bell Labs
  959. BBDO Advertising
  960. The BBC
  961. Bell Canada
  962. Bell North'n Research
  963. British Telecom
  964. Chiat/Day
  965. COMSAT
  966. Dow Jones & Co.
  967. GE Information Srvcs.
  968. GTE Communications
  969. Int'l Aeradio Ltd.
  970. Marconi
  971. Michigan Bell Tel. Co.
  972. NICORP
  973. Nothern Telecom
  974. Pacific Bell
  975. PC World Comm.
  976. Phonemate
  977. RCA
  978. Rodchester Tel.
  979. Redgate Com.
  980. ROLM
  981. Ted Bates
  982. Thorn Ericsson
  983. Turner Broadcasting
  984. Voice of America
  985. WCEO-TV Minneapolis
  986. Wisonsin Bell
  987. US Sprint
  988.  
  989.  
  990.  
  991. -- part contents for card part 4
  992. ----- text -----
  993. Army Corp. of 
  994.    Engineers
  995. Bechtel
  996. Brown & Root, Inc.
  997. Davy McKee
  998. Dravo
  999. French Kier Const.
  1000. Olympia & York
  1001. Pirelli Construction
  1002. Sangamo Group
  1003. Shimizu Const-Saipan
  1004. Taylor Woodrow Intl.
  1005.  
  1006. -- part contents for card part 26
  1007. ----- text -----
  1008. Allen Bradley
  1009. Asea Robotics
  1010. Beckman Instrument
  1011. Foxboro
  1012. Gould IGD
  1013. Magnavox
  1014. Motorola
  1015. Siemens
  1016. Sharp
  1017. Westinghouse
  1018.  
  1019.  
  1020. -- part contents for card part 6
  1021. ----- text -----
  1022. Alyseka Pipeline
  1023. ARCO
  1024. British Nuclear Fuels
  1025. British Gas
  1026. British Petroleum
  1027. Chevron Research
  1028. China Nt'l. Offshore
  1029. Commonwealth
  1030.     Edison
  1031. Cooper Energy 
  1032. Dayton Power & Light
  1033. Diamond Shamrock
  1034. Duke Power Company
  1035. Esso Group
  1036. Gulf Canada
  1037. Hamilton Bros. Oil 
  1038. Hunting Oilfield Svcs.
  1039. Kongsberg 
  1040.    Vaapenfabrikk A/S
  1041. Mobil Exploration
  1042. Norsk Hydro
  1043. Ontario Hydro
  1044. Petrola-Saudi Arabia
  1045. Petroleum Group of   
  1046.    New Zealand
  1047. Schlumberger Group
  1048. Shell Oil
  1049. SOHIO
  1050. Southern Cal. Edison
  1051. Standard Alaska
  1052. Standard Oil
  1053. Tenneco Oil
  1054. Tennesse Valley Auth.
  1055. UNOCAL (Netherlands)
  1056.  
  1057.  
  1058.  
  1059.  
  1060. -- part contents for card part 7
  1061. ----- text -----
  1062. The BBC
  1063. Colossal Pictures
  1064. Davezac Film 
  1065. LA Festival
  1066. Lucas Films
  1067. Track Records
  1068. Walt Disney
  1069.  
  1070. -- part contents for card part 8
  1071. ----- text -----
  1072. Arthur Andersen & Co. 
  1073. Arthur Young & Co
  1074. Booz, Allen &
  1075.     Hamillton
  1076. Coopers & Lybrand
  1077. Peat Marwick
  1078. Price Waterhouse
  1079. The Rand Corp.
  1080. S.R.I. International
  1081. Theodore Barry &
  1082.    Associates
  1083. Touche Ross & Co.
  1084.  
  1085.  
  1086. -- part contents for card part 10
  1087. ----- text -----
  1088. ALCOA
  1089. ARMCO Steel
  1090. Bethlehem Steel
  1091. Boise Cascade
  1092. Bombardier Inc.
  1093. Bowater Scott
  1094. Coca Cola Corp.
  1095. Combustion Engineer
  1096. Cummins Engineering
  1097. Delco Systems
  1098. Dow Chemicals
  1099. Dunlop
  1100. Eastman Kodak 
  1101. Emerson Systems
  1102. Ford Motor Co.
  1103. General Motors
  1104. General Electric Co.
  1105. Gillette Co.
  1106. Goodrich Tires
  1107. Honolulu Shipyards
  1108. John Deere
  1109. Kidd Creek Mines
  1110. Monsanto
  1111. Merrell Dow
  1112. NCR
  1113. Owens Corning
  1114. Owens Illinois
  1115. Polaroid
  1116. PPG Industries
  1117. Pitney Bowes
  1118. Proctor & Gamble
  1119. Sears
  1120. 3M Company
  1121. Toro
  1122. Union Carbide
  1123. Western Gear Corp.
  1124. Weyerhauser 
  1125. Uniroyal
  1126.  
  1127.  
  1128. -- part contents for card part 27
  1129. ----- text -----
  1130. Battlle Northwest
  1131. Camp Dresser &
  1132.     McKee
  1133. Celltech
  1134. Chevron Research
  1135. Naval Research Lab
  1136. Plessey Research
  1137. RCA-David Sarnoff  
  1138.    Research
  1139. Sargent Lundy
  1140. Teledyne Brown
  1141. Trans Canada 
  1142.    Engineering
  1143. Unilever Research UK
  1144.  
  1145.  
  1146. -- part contents for card part 12
  1147. ----- text -----
  1148. American Airlines
  1149. Bay Area Rapid Trans.
  1150. British Airways
  1151. British Rail
  1152. Calif. Dept. of Motor 
  1153.    Vehicles
  1154. Cal Trans
  1155. Emery Worldwide
  1156. Federal Express
  1157. Floridia Dept. of
  1158.     Transportation
  1159. New York Transit 
  1160.    Authority
  1161. Swiss Air
  1162.  
  1163.  
  1164. -- part contents for card part 36
  1165. ----- text -----
  1166. ...nice company to keep, eh?
  1167.  
  1168. -- part contents for card part 5
  1169. ----- text -----
  1170. Boston University
  1171. Boston College
  1172. Carnegie-Mellon Univ.
  1173. Colorado State Univ.
  1174. D.C. Public Schools
  1175. Houston Indp. School
  1176.    District
  1177. George Washington 
  1178.    University
  1179. John Hopkins 
  1180.    University
  1181. LA School District
  1182. Linfield College
  1183. MIT
  1184. North Texas State
  1185. Oregon State 
  1186.    University
  1187. Princeton University
  1188. San Jose School Dist.
  1189. St. Louis Pub. Schools
  1190. Stanford University
  1191. UCLA
  1192. University of Alaska
  1193. University of Arizona
  1194. Univ. of California
  1195. University of Illinois
  1196. Univ. of Michigan
  1197. Univ. of Washington
  1198. Univ. of New Mexico
  1199. Univ. of Puerto Rico
  1200. University of Texas
  1201. Vassar College
  1202. Victoria University of
  1203.    Wellington
  1204.  
  1205.  
  1206. -- part contents for card part 11
  1207. ----- text -----
  1208. A.W.R.E.
  1209. G.C.H.Q.
  1210. Ministry of Defence
  1211. US Army
  1212. US Navy
  1213.  
  1214. -- part contents for card part 37
  1215. ----- text -----
  1216. Aetna
  1217. Bank of America
  1218. Bank of Tokyo
  1219. Barclays Bank Int'l.
  1220. Bear Stearns & Co.
  1221. Citibank
  1222. Citicorp Savings
  1223. First Hawiian Bank
  1224. First Wisconsin Bank
  1225. Home Federal S&L
  1226. Household Finance
  1227. Irving Trust Co.
  1228. Midatlantic Nat'l Bank
  1229. The Morgan Bank
  1230. Paine Webber
  1231. Sea First Bank
  1232. Trustee Savings Bank
  1233. Union Bank of Switzerland
  1234. World Bank
  1235.  
  1236.  
  1237. -- part contents for card part 9
  1238. ----- text -----
  1239. Canadian National 
  1240.    Defense HQ
  1241. C.I.A.
  1242. Gov't du Quebec
  1243. GSA
  1244. Nevada Att'y General
  1245. New Zealand 
  1246.    Ministry of Agric.
  1247. Small Business Admin.
  1248. Swedish Embassy
  1249. U.S. Army
  1250. U.S. Air Force
  1251. U.S. Census Bureau
  1252. U.S. Coast Guard
  1253. U.S. Dept. of Agric.
  1254. U.S. Dept. of Defense
  1255. U.S. Dept. of Energy
  1256. U.S. Enviromental 
  1257.    Protection Agency
  1258. U.S. Naval Air 
  1259.    Systems Command
  1260. U.S. Navy
  1261. U.S. Treasury
  1262.  
  1263.  
  1264.  
  1265. -- part contents for card part 42
  1266. ----- text -----
  1267. Celanese Corporation
  1268. Dow Chemical
  1269. DuPont
  1270. Eli Lilly & Company
  1271. Genentech
  1272. G.D. Searle & Co.
  1273. Hercules
  1274. Immunex
  1275. Merrell Dow Pharm.
  1276. Monsanto
  1277. Searle Laboratories
  1278. Smith Kline Beckman
  1279. Smith Kline & French
  1280. Syntex
  1281. UpJohn
  1282.  
  1283.  
  1284.  
  1285.  
  1286. -- part contents for card part 43
  1287. ----- text -----
  1288. Black & Decker 
  1289. Coca-Cola Bottling Co.
  1290. Cogate Palmolive Co.
  1291. Eastman Kodak
  1292. Frito Lay, Inc
  1293. The Gillette Company
  1294. General Foods
  1295. General Mills
  1296. Poloroid
  1297. Proctor & Gamble
  1298.  
  1299. -- part contents for card part 44
  1300. ----- text -----
  1301. Allied Medical Group
  1302. American Academy of 
  1303.   Orthopedic Surgeons
  1304. American Red Cross
  1305. American Social 
  1306.    Health
  1307. Cans for Kids
  1308. Catholic Chruch Papal  
  1309.    Visit
  1310. Family Health &
  1311.    Habilitive Services
  1312. Kaiser Health Plan
  1313. Livermore Public 
  1314.    Library
  1315. Lutheran Church
  1316. Pacific Coast 
  1317.    Outward Bound
  1318. The Salvation Army
  1319. United Medical Co.
  1320. Veteran's Admin.
  1321.  
  1322.  
  1323.